Add comment.

diff --git a/lisp/locate.el b/lisp/locate.el
index d0ef749281b159fc1869805725d658ca629c9fd3..74a76fa4889405e317cd0300b487542cd73fcf12 100644 (file)
--- a/lisp/locate.el
+++ b/lisp/locate.el
@@ -245,6 +245,7 @@ that is, with a prefix arg, you get the default behavior."
        (skip-chars-backward "." pt)
        (point)))))
 
+;; Function for use in interactive declarations.
 (defun locate-prompt-for-search-string ()
   (if (or (and current-prefix-arg
               (not locate-prompt-for-command))